n:, T:Type, R1,R2:(TTprop{i:l}).
rel_implies(T; R1; R2)  rel_implies(T; rel_exp(T; R1; n); rel_exp(T; R2; n)) 

latex

Definitions	False, A, A  B, ge(i; j), P  Q, t  T, x:A. B(x), tt, (i = j), if b then t else f fi , Y, x f y, rel_exp(T; R; n), rel_implies(T; R1; R2), prop{i:l}, ff, , P  Q, x:A. B(x), A c B, P  Q, Unit, ,
Lemmas	ge wf, nat properties, nat wf, rel implies wf, not functionality wrt iff, assert of bnot, eqff to assert, assert of eq int, eqtt to assert, iff transitivity, le wf, rel exp wf, not wf, bnot wf, assert wf, bool wf, eq int wf